<?php
/**
 * 支付宝支付处理类
 */

namespace App\Services\Tools;

use App\Enums\WechatPayChannelEnum;
use App\Repositories\LogRepository;

class WxPayService
{
    protected $config;

    public function __construct(array $config = [])
    {
        $this->config = $config;
    }


    /**
     * 微信支付App
     * @param string $data 业务参数 body out_trade_no total_fee
     * @param string $data ['out_trade_no'] 订单号  必填
     * @param string $data ['total_fee'] 订单金额  必填
     * @param string $data ['body'] 订单详情  必填
     * @return $response 返回app所需字符串
     */
    public function WxPayApp($orderSn, $money, $body, $attach)
    {
        $wxConfig = $this->config;
        $out_trade_no = $orderSn;
        $total_fee = abs(floatval($money)) * 100;// 微信支付 单位为分
        $nonce_str = $this->getRandChar(32);
        $ip = $this->get_client_ip();
        if ($ip == '::1') {
            $ip = '1.1.1.1';
        }
        if ($wxConfig['sub_mch_id'] != "") {
            $data ["sub_appid"] = $wxConfig['sub_appid'];
            $data ["sub_mch_id"] = $wxConfig['sub_mch_id'];
        }
        $data ["appid"] = $wxConfig['app_id'];
        $data ["body"] = $body;
        $data['attach'] = $attach;
        $data ["mch_id"] = $wxConfig['mch_id'];
        $data ["nonce_str"] = $nonce_str;
        $data ["notify_url"] = $wxConfig["notify_url"];
        $data ["out_trade_no"] = $out_trade_no;
        $data ["spbill_create_ip"] = $ip;
        $data ["total_fee"] = $total_fee;
//        $data ["total_fee"] = 1;
        $data ["trade_type"] = "APP";
        $data ["time_expire"] = date("YmdHis", strtotime('+10 minute'));

        $s = $this->getSign($data);
        $data ["sign"] = $s;
        $logRtx = new LogRepository("user_order_sn");
        $logRtx->log("data", $data);
        $logRtx->File();
        $xml = $this->arrayToXml($data);
        $url = 'https://api.mch.weixin.qq.com/pay/unifiedorder';
        $response = $this->postXmlCurl($xml, $url);
        $re = $this->xmlstr_to_array($response);
        $logRtx = new LogRepository("user_order_sn");
        $logRtx->log("拉起支付返回参数：", $re);
        $logRtx->File();
        if ($re ['return_code'] == 'FAIL') {
            return [
                'code' => -1,
                'msg' => '订单创建失败!' . $re['return_msg']
            ];
        } elseif ($re ['result_code'] == 'FAIL') {
            return [
                'code' => -1,
                'msg' => '订单创建失败!' . $re['return_msg']
            ];
        }
        // 二次签名
//        $reapp = $this->getOrder($re['prepay_id']);
//        return $reapp;

        if ($wxConfig['sub_mch_id'] != "") {
            $android = $this->getAndroidOrder($re['prepay_id']);
        }
        // 二次签名
        $reapp = $this->getOrder($re['prepay_id']);
        return [
            'reapp' => $reapp,
            'android' => $android ?? ''
        ];
    }

    /**
     * 微信支付App
     * @param string $data 业务参数 body out_trade_no total_fee
     * @param string $data ['out_trade_no'] 订单号  必填
     * @param string $data ['total_fee'] 订单金额  必填
     * @param string $data ['body'] 订单详情  必填
     * @return $response 返回app所需字符串
     * 第三方的
     */
    public function WxPayH5($outTradeNo, $totalFee, $body, $attach)
    {
        $wxConfig = $this->config;
        $out_trade_no = $outTradeNo;
        $total_fee = abs(floatval($totalFee)) * 100;// 微信支付 单位为分
        $nonce_str = $this->getRandChar(32);
        $ip = $this->get_client_ip();
        if ($ip == '::1') {
            $ip = '1.1.1.1';
        }
        $data ["appid"] = $wxConfig['app_id'];
        $data ["mch_id"] = $wxConfig['mch_id'];
        $data ["sub_mch_id"] = $wxConfig['sub_mch_id'];
        $data ["body"] = $body;
        $data['attach'] = $attach;
        $data ["nonce_str"] = $nonce_str;
        $data ["notify_url"] = $wxConfig["notify_url"];
        $data ["out_trade_no"] = $out_trade_no;
        $data ["spbill_create_ip"] = $ip;
        $data ["total_fee"] = $total_fee;
        $data ["trade_type"] = "MWEB";
        $data ["time_expire"] = date("YmdHis", strtotime('+10 minute'));

        $s = $this->getSign($data);
        $data ["sign"] = $s;
        $logRtx = new LogRepository("user_order_sn_h5");
        $logRtx->log("data", $data);
        $logRtx->File();
        $xml = $this->arrayToXml($data);
        $url = 'https://api.mch.weixin.qq.com/pay/unifiedorder';
        $response = $this->postXmlCurl($xml, $url);
        $re = $this->xmlstr_to_array($response);
        $logRtx = new LogRepository("user_order_sn_h5");
        $logRtx->log("拉起支付返回参数：", $re);
        $logRtx->File();
        if ($re ['return_code'] == 'FAIL') {
            return [
                'code' => -1,
                'msg' => '订单创建失败!' . $re['return_msg']
            ];
        } elseif ($re ['result_code'] == 'FAIL') {
            return [
                'code' => -1,
                'msg' => '订单创建失败!' . $re['return_msg']
            ];
        }
        return $re['mweb_url'];
    }

    /**
     * 微信web支付 需要签约 电脑网站支付
     * @param string $data 业务参数
     * @param string $data ['out_trade_no'] 订单号  必填
     * @param string $data ['total_fee'] 订单金额  必填
     * @param string $data ['body'] 订单详情  必填
     * @return string 支付二维码图片地址
     */
    public function WxPayWeb($d)
    {
        $wxConfig = $this->config;
        $out_trade_no = $d['out_trade_no'];
        $total_fee = abs(floatval($d['total_fee'])) * 100;// 微信支付 单位为分
        $nonce_str = $this->getRandChar(32);
        $ip = $this->get_client_ip();
        if ($ip == '::1')
            $ip = '1.1.1.1';
        $data ["appid"] = $wxConfig["app_id"];
        $data ["body"] = $d['body'];
        $data ["mch_id"] = $wxConfig['mch_id'];
        $data ["nonce_str"] = $nonce_str;
        $data ["notify_url"] = $wxConfig["notify_url"];
        $data ["out_trade_no"] = $out_trade_no;
        $data ["spbill_create_ip"] = $ip;
        $data ["total_fee"] = $total_fee;
        $data ["trade_type"] = "NATIVE";
        $s = $this->getSign($data);
        $data ["sign"] = $s;
        $xml = $this->arrayToXml($data);
        $url = 'https://api.mch.weixin.qq.com/pay/unifiedorder';
        $response = $this->postXmlCurl($xml, $url);
        $re = $this->xmlstr_to_array($response);
        if ($re ['return_code'] == 'FAIL') {
            return json_encode(array(-1, '订单创建失败!', $re['return_msg']));
        }
        $url2 = $re["code_url"];
        $imgUrl = '/Plugins/WxPay/qrcode.php?data=' . urlencode($url2);
        return $imgUrl;
        //return '<img alt="模式二扫码支付" src="/Plugins/WxPay/phpqrcode.php?data=' . urlencode($url2).'"/>';
    }

    /**
     * 微信退款
     * @param $d
     */
    public function wxRefund($d)
    {
        $wxConfig = $this->config;
        $str = $this->getRandChar(32);
        $total_fee = abs(floatval($d['total_fee'])) * 100;
        $refund_fee = abs(floatval($d['refund_fee'])) * 100;
        $data ["appid"] = $wxConfig["app_id"];
        $data ["mch_id"] = $wxConfig['mch_id'];
        $data['nonce_str'] = $str;
        $data['out_trade_no'] = $d['out_trade_no'];     //支付是返回的订单编号
        $data['out_refund_no'] = $d['out_refund_no'];   //退单编号-重新生成的
        $data['total_fee'] = $total_fee;                //订单总金额
        $data['refund_fee'] = $refund_fee;              //需要退还金额
        $data['refund_desc'] = $d['refund_desc'];          //退款描述
        $s = $this->getSign($data);
        $data ["sign"] = $s;
        $url = "https://api.mch.weixin.qq.com/secapi/pay/refund";
        $xml = $this->arrayToXml($data);
        $result = $this->url($xml, $url);
        return $result;
    }

    /**
     * 微信退款详情
     * @param $d
     */
    public function wxRefundDetail($d)
    {
        $wxConfig = $this->config;
        $str = $this->getRandChar(32);
        $data ["appid"] = $wxConfig["app_id"];
        $data ["mch_id"] = $wxConfig['mch_id'];
        $data['nonce_str'] = $str;
        $data['out_trade_no'] = $d['out_trade_no']; //订单号，不用订单号可以添加其他的
        $s = $this->getSign($data);
        $data ["sign"] = $s;
        $url = "https://api.mch.weixin.qq.com/pay/refundquery";
        $xml = $this->arrayToXml($data);
        $response = $this->postXmlCurl($xml, $url);
        $re = $this->xmlstr_to_array($response);
        return $re;
    }

    /**
     * 获取微信支付订单详情
     * @param $d
     * @return array|string
     * author Hso
     */
    public function WxPayGetPayStatus($d)
    {
        $wxConfig = $this->config;
        $data ["appid"] = $wxConfig["app_id"];
        $data ["mch_id"] = $wxConfig['mch_id'];
        if (!empty($d['transaction_id'])) {
            $data ["transaction_id"] = $d["transaction_id"];
        }
        if (!empty($d['out_trade_no'])) {
            $data ["out_trade_no"] = $d["out_trade_no"];
        }
        $nonce_str = $this->getRandChar(32);
        $data ["nonce_str"] = $nonce_str;

        $s = $this->getSign($data);
        $data ["sign"] = $s;
        $xml = $this->arrayToXml($data);
        $url = 'https://api.mch.weixin.qq.com/pay/orderquery';
        $response = $this->postXmlCurl($xml, $url);
        $re = $this->xmlstr_to_array($response);
        return $re;
    }

    /**
     * 微信提现
     * @param $d
     */
    public function wxWithdraw($d)
    {
        $wxConfig = $this->config;
        $str = $this->getRandChar(32);
        $data['mch_appid'] = $wxConfig["app_id"];
        $data['mchid'] = $wxConfig['mch_id'];
        $data['openid'] = $d['openid'];             //提现用户授权id openid
        $data['nonce_str'] = $str;
        $data['partner_trade_no'] = $d['partner_trade_no'];    //订单号
        $data['check_name'] = 'NO_CHECK';
        $data['amount'] = $d['amount'] * 100;                 //提现金额
        $data['desc'] = '平台提现';
        $data['spbill_create_ip'] = $_SERVER['SERVER_ADDR'];
        $s = $this->getSign($data);
        $data ["sign"] = $s;
        $url = "https://api.mch.weixin.qq.com/mmpaymkttransfers/promotion/transfers";
        $xml = $this->arrayToXml($data);
        $result = $this->url($xml, $url);
        return $result;
    }

    /**
     * curl
     */
    function url($xml, $url, $second = 30)
    {
        $ch = curl_init();
        curl_setopt($ch, CURLOPT_URL, $url);
        curl_setopt($ch, CURLOPT_HEADER, FALSE);
        curl_setopt($ch, CURLOPT_RETURNTRANSFER, TRUE);
        // curl_setopt($ch,CURLOPT_SSL_VERIFYPEER,TURE);//证书检查
        // curl_setopt($ch,CURLOPT_SSLCERTTYPE,'pem');
        // curl_setopt($ch,CURLOPT_SSLCERT,getcwd().'/Plugins/WxPay/cert/apiclient_cert.pem');
        // curl_setopt($ch,CURLOPT_SSLCERTTYPE,'pem');
        // curl_setopt($ch,CURLOPT_SSLKEY,getcwd().'/Plugins/WxPay/cert/apiclient_key.pem');
        // curl_setopt($ch,CURLOPT_SSLCERTTYPE,'pem');
        // curl_setopt($ch,CURLOPT_CAINFO,getcwd().'/Plugins/WxPay/cert/rootca.pem');
        curl_setopt($ch, CURLOPT_POST, TRUE);
        curl_setopt($ch, CURLOPT_POSTFIELDS, $xml);

        curl_setopt($ch, CURLOPT_TIMEOUT, $second);
        curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, FALSE);
        // 要求结果为字符串且输出到屏幕上

        $data = curl_exec($ch);
        if ($data) {
            curl_close($ch);
            $re = $this->xmlstr_to_array($data);
            return $re;
        } else {
            $error = curl_errno($ch);
            echo "curl出错，错误代码：$error" . "<br/>";
            echo "<a href='http://curl.haxx.se/libcurl/c/libcurs.html'>;错误原因查询</a><br/>";
            curl_close($ch);
            echo false;
        }

        // 初始化curl
        $ch = curl_init();
        // 超时时间
        curl_setopt($ch, CURLOPT_TIMEOUT, $second);
        // 这里设置代理，如果有的话
        // curl_setopt($ch,CURLOPT_PROXY, '8.8.8.8');
        // curl_setopt($ch,CURLOPT_PROXYPORT, 8080);
        curl_setopt($ch, CURLOPT_URL, $url);
        curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, FALSE);
        curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, FALSE);
        // 设置header
        curl_setopt($ch, CURLOPT_HEADER, FALSE);
        // 要求结果为字符串且输出到屏幕上
        curl_setopt($ch, CURLOPT_RETURNTRANSFER, TRUE);
        // post提交方式
        curl_setopt($ch, CURLOPT_POST, TRUE);
        curl_setopt($ch, CURLOPT_POSTFIELDS, $xml);
        // 运行curl
        $data = curl_exec($ch);
        // 返回结果
        if ($data) {
            curl_close($ch);
            return $data;
        } else {
            $error = curl_errno($ch);
            echo "curl出错，错误码:$error" . "<br>";
            echo "<a href='http://curl.haxx.se/libcurl/c/libcurl-errors.html'>错误原因查询</a></br>";
            curl_close($ch);
            return false;
        }
    }

    /**
     * 微信签名验证
     * @param string $data 业务参数
     * @return array
     */
    public function WxPayNotifyCheck()
    {
        // $postStr = $GLOBALS['HTTP_RAW_POST_DATA'];

        $postStr = file_get_contents('php://input');
        $postObj = simplexml_load_string($postStr, 'SimpleXMLElement', LIBXML_NOCDATA);
        if ($postObj === false) {
        }
        if ($postObj->return_code != 'SUCCESS') {
        }

        $arr = (array)$postObj;

        unset($arr['sign']);
        if ($this->getSign($arr) == $postObj->sign) {
            return array('status' => true, 'data' => $arr);
        } else {
            return array('status' => false);
        }
    }


    /**
     * 以下为微信所需相关方法，请勿修改
     */

    public function getAndroidOrder($prepayId)
    {
        $data ["appid"] = $this->config["sub_appid"];
        $data ["noncestr"] = $this->getRandChar(32);
        $data ["package"] = "Sign=WXPay";
        $data ["partnerid"] = $this->config ['sub_mch_id'];
        $data ["prepayid"] = $prepayId;
        $data ["timestamp"] = time();
        $s = $this->getSign($data);
        $data ["sign"] = $s;
        // $xml = $this->arrayToXml($data);
        // echo $xml . PHP_EOL;
        return $data;
    }

    // 执行第二次签名，才能返回给客户端使用
    public function getOrder($prepayId)
    {
        $data ["appid"] = $this->config["app_id"];
        $data ["noncestr"] = $this->getRandChar(32);
        $data ["package"] = "Sign=WXPay";
        $data ["partnerid"] = $this->config ['mch_id'];
        $data ["prepayid"] = $prepayId;
        $data ["timestamp"] = time();
        $s = $this->getSign($data);
        $data ["sign"] = $s;

        // $xml = $this->arrayToXml($data);
        // echo $xml . PHP_EOL;

        return $data;
    }

    //生成签名
    function getSign($Obj)
    {
        foreach ($Obj as $k => $v) {
            $Parameters [strtolower($k)] = $v;
        }
        // 签名步骤一：按字典序排序参数
        ksort($Parameters);
        $String = $this->formatBizQueryParaMap($Parameters, false);
        // echo "【string】 =".$String."</br>";
        // 签名步骤二：在string后加入KEY
        $String = $String . "&key=" . $this->config['key'];
        //$String = $String . "&key=" . "08ff3a479cc5e56e520263959b9b25bf";
//        $logRtx = new LogRepository("user_order_sn");
//        $logRtx->log("key",   $this->config ['key']);
//        $logRtx->File();
//        $logRtx = new LogRepository("user_order_sn");
//        $logRtx->log("String",   $String);
//        $logRtx->File();
        // echo "<textarea style='width: 50%; height: 150px;'>$String</textarea> <br />";
        // 签名步骤三：MD5加密
        $result_ = strtoupper(md5($String));
        return $result_;
    }

    // 获取指定长度的随机字符串
    function getRandChar($length)
    {
        $str = null;
        $strPol = "ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789abcdefghijklmnopqrstuvwxyz";
        $max = strlen($strPol) - 1;

        for ($i = 0; $i < $length; $i++) {
            $str .= $strPol [rand(0, $max)]; // rand($min,$max)生成介于min和max两个数之间的一个随机整数
        }

        return $str;
    }

    // 数组转xml
    function arrayToXml($arr)
    {
        $xml = "<xml>";
        foreach ($arr as $key => $val) {
            if (is_numeric($val)) {
                $xml .= "<" . $key . ">" . $val . "</" . $key . ">";
            } else
                $xml .= "<" . $key . "><![CDATA[" . $val . "]]></" . $key . ">";
        }
        $xml .= "</xml>";
        return $xml;
    }

    // post https请求，CURLOPT_POSTFIELDS xml格式
    function postXmlCurl($xml, $url, $second = 30)
    {
        // 初始化curl
        $ch = curl_init();
        // 超时时间
        curl_setopt($ch, CURLOPT_TIMEOUT, $second);
        // 这里设置代理，如果有的话
        // curl_setopt($ch,CURLOPT_PROXY, '8.8.8.8');
        // curl_setopt($ch,CURLOPT_PROXYPORT, 8080);
        curl_setopt($ch, CURLOPT_URL, $url);
        curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, FALSE);
        curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, FALSE);
        // 设置header
        curl_setopt($ch, CURLOPT_HEADER, FALSE);
        // 要求结果为字符串且输出到屏幕上
        curl_setopt($ch, CURLOPT_RETURNTRANSFER, TRUE);
        // post提交方式
        curl_setopt($ch, CURLOPT_POST, TRUE);
        curl_setopt($ch, CURLOPT_POSTFIELDS, $xml);
        // 运行curl
        $data = curl_exec($ch);
        // 返回结果
        if ($data) {
            curl_close($ch);
            return $data;
        } else {
            $error = curl_errno($ch);
            echo "curl出错，错误码:$error" . "<br>";
            echo "<a href='http://curl.haxx.se/libcurl/c/libcurl-errors.html'>错误原因查询</a></br>";
            curl_close($ch);
            return false;
        }
    }

    //获取当前服务器的IP
    function get_client_ip()
    {
        if ($_SERVER ['REMOTE_ADDR']) {
            $cip = $_SERVER ['REMOTE_ADDR'];
        } elseif (getenv("REMOTE_ADDR")) {
            $cip = getenv("REMOTE_ADDR");
        } elseif (getenv("HTTP_CLIENT_IP")) {
            $cip = getenv("HTTP_CLIENT_IP");
        } else {
            $cip = "unknown";
        }
        return $cip;
    }

    // 将数组转成uri字符串
    function formatBizQueryParaMap($paraMap, $urlencode)
    {
        $buff = "";
        ksort($paraMap);
        foreach ($paraMap as $k => $v) {
            if ($urlencode) {
                $v = urlencode($v);
            }
            $buff .= strtolower($k) . "=" . $v . "&";
        }

        if (strlen($buff) > 0) {
            $reqPar = substr($buff, 0, strlen($buff) - 1);
        }
        return $reqPar;
    }

    //xml转成数组
    function xmlstr_to_array($xmlstr)
    {
        $doc = new \DOMDocument ();
        $doc->loadXML($xmlstr);
        return $this->domnode_to_array($doc->documentElement);
    }

    //dom转成数组
    function domnode_to_array($node)
    {
        $output = array();
        switch ($node->nodeType) {
            case XML_CDATA_SECTION_NODE :
            case XML_TEXT_NODE :
                $output = trim($node->textContent);
                break;
            case XML_ELEMENT_NODE :
                for ($i = 0, $m = $node->childNodes->length; $i < $m; $i++) {
                    $child = $node->childNodes->item($i);
                    $v = $this->domnode_to_array($child);
                    if (isset ($child->tagName)) {
                        $t = $child->tagName;
                        if (!isset ($output [$t])) {
                            $output [$t] = array();
                        }
                        $output [$t] [] = $v;
                    } elseif ($v) {
                        $output = ( string )$v;
                    }
                }
                if (is_array($output)) {
                    if ($node->attributes->length) {
                        $a = array();
                        foreach ($node->attributes as $attrName => $attrNode) {
                            $a [$attrName] = ( string )$attrNode->value;
                        }
                        $output ['@attributes'] = $a;
                    }
                    foreach ($output as $t => $v) {
                        if (is_array($v) && count($v) == 1 && $t != '@attributes') {
                            $output [$t] = $v [0];
                        }
                    }
                }
                break;
        }
        return $output;
    }

}
